﻿Public Class Persona
    Dim codigoPersona As String
    Dim nombrePersona As String
    Dim direccionPersona As String
    Dim telefonoPersona As String
    Dim dniPersona As String


    Public Property Codigo As String
        Get
            Return codigoPersona
        End Get
        Set(ByVal value As String)
            codigoPersona = value
        End Set
    End Property

    Public Property Nombre As String
        Get
            Return nombrePersona
        End Get
        Set(ByVal value As String)
            nombrePersona = value
        End Set
    End Property

    Public Property Direccion As String
        Get
            Return direccionPersona
        End Get
        Set(ByVal value As String)
            direccionPersona = value
        End Set
    End Property

    Public Property Telefono As String
        Get
            Return telefonoPersona
        End Get
        Set(ByVal value As String)
            telefonoPersona = value
        End Set
    End Property
    Public Property Dni As String
        Get
            Return dniPersona
        End Get
        Set(ByVal value As String)
            dniPersona = value
        End Set
    End Property
End Class
